home *** CD-ROM | disk | FTP | other *** search
/ Great Canadian Scientists / GCS_CD.iso / mac / PC / GCSData / menus_o.dxr / 00104_Startup Screen (BoxDown) Loop.ls < prev    next >
Encoding:
Text File  |  1996-09-08  |  312 b   |  15 lines
  1. on exitFrame
  2.   global BoxUp
  3.   BSuspend(18, 19)
  4.   set the keyDownScript to "KeyCheck"
  5.   set the mouseDownScript to "BoxUp"
  6.   set the mouseUpScript to "BoxUp"
  7.   set the checkBoxAccess to 1
  8.   if BoxUp = 0 then
  9.     set the editableText of sprite 17 to 0
  10.   end if
  11.   cursor(-1)
  12.   CheckHilite(8, 9)
  13.   go(the frame)
  14. end
  15.